perm filename QTR.DAT[M11,LCS] blob sn#374007 filedate 1978-08-01 generic text, type T, neo UTF8
SRT←12800;
INS 0 1; <  INSTRUMENT 1 
OSC P4 P13 B2 F1 P30;    
SET P5;   
OSC B2 P3 B2 F2 P29;
OUT B2 B1;END; <  ALL PARAM NUMS ARE 2 LESS THAN IN BOOK!   
GEN 0 1 1 .01 0 .99 25   
.99 400  0 511;<GEN INPUT MUST ALWAYS START NEW LINE!00101500    
GEN 0 2 2  1  0 .2 .04 0 0 0 0 0 .5 10; 
GEN 0 2 3  1  1  0 .24 .3 5;  
GEN 0 1 4, -.99 0 .2 55 ,-.4 100 .99 255,-.99 511; <TRIANGLE+    
INSTRUMENTS;   
BUZZ 1 13 FREQ 3    
END; 
 
  < NN   .SCR  --  RANDOM NUMBER=     1
 PLAY;
 BUZZ     0.000    0.150 440.000   1000.0    F3   0.000   0.000   0.000   0.000   0.000
         0.000  24.000
;PRINT P1;< BUZZ    1
 BUZZ     0.150    0.150 452.893   1000.0    F4   0.000   0.000   0.000   0.000   0.000
         1.000
;PRINT P1;< BUZZ    2
 BUZZ     0.300    0.150 466.164   1000.0    F2   0.000   0.000   0.000   0.000   0.000
         2.000
;PRINT P1;< BUZZ    3
 BUZZ     0.450    0.150 479.823   1000.0    F3   0.000   0.000   0.000   0.000   0.000
         3.000
;PRINT P1;< BUZZ    4
 BUZZ     0.600    0.150 493.883   1000.0    F4   0.000   0.000   0.000   0.000   0.000
         4.000
;PRINT P1;< BUZZ    5
 BUZZ     0.750    0.150 508.355   1000.0    F2   0.000   0.000   0.000   0.000   0.000
         5.000
;PRINT P1;< BUZZ    6
 BUZZ     0.900    0.150 523.251   1000.0    F3   0.000   0.000   0.000   0.000   0.000
         6.000
;PRINT P1;< BUZZ    7
 BUZZ     1.050    0.150 538.583   1000.0    F4   0.000   0.000   0.000   0.000   0.000
         7.000
;PRINT P1;< BUZZ    8
 BUZZ     1.200    0.150 554.365   1000.0    F2   0.000   0.000   0.000   0.000   0.000
         8.000
;PRINT P1;< BUZZ    9
 BUZZ     1.350    0.150 570.609   1000.0    F3   0.000   0.000   0.000   0.000   0.000
         9.000
;PRINT P1;< BUZZ   10
 BUZZ     1.500    0.150 587.329   1000.0    F4   0.000   0.000   0.000   0.000   0.000
        10.000
;PRINT P1;< BUZZ   11
 BUZZ     1.650    0.150 604.539   1000.0    F2   0.000   0.000   0.000   0.000   0.000
        11.000
;PRINT P1;< BUZZ   12
 BUZZ     1.800    0.150 622.254   1000.0    F3   0.000   0.000   0.000   0.000   0.000
        12.000
;PRINT P1;< BUZZ   13
 BUZZ     1.950    0.150 640.487   1000.0    F4   0.000   0.000   0.000   0.000   0.000
        13.000
;PRINT P1;< BUZZ   14
 BUZZ     2.100    0.150 659.255   1000.0    F2   0.000   0.000   0.000   0.000   0.000
        14.000
;PRINT P1;< BUZZ   15
 BUZZ     2.250    0.150 678.573   1000.0    F3   0.000   0.000   0.000   0.000   0.000
        15.000
;PRINT P1;< BUZZ   16
 BUZZ     2.400    0.150 698.456   1000.0    F4   0.000   0.000   0.000   0.000   0.000
        16.000
;PRINT P1;< BUZZ   17
 BUZZ     2.550    0.150 718.923   1000.0    F2   0.000   0.000   0.000   0.000   0.000
        17.000
;PRINT P1;< BUZZ   18
 BUZZ     2.700    0.150 739.989   1000.0    F3   0.000   0.000   0.000   0.000   0.000
        18.000
;PRINT P1;< BUZZ   19
 BUZZ     2.850    0.150 761.672   1000.0    F4   0.000   0.000   0.000   0.000   0.000
        19.000
;PRINT P1;< BUZZ   20
 BUZZ     3.000    0.150 783.991   1000.0    F2   0.000   0.000   0.000   0.000   0.000
        20.000
;PRINT P1;< BUZZ   21
 BUZZ     3.150    0.150 806.963   1000.0    F3   0.000   0.000   0.000   0.000   0.000
        21.000
;PRINT P1;< BUZZ   22
 BUZZ     3.300    0.150 830.609   1000.0    F4   0.000   0.000   0.000   0.000   0.000
        22.000
;PRINT P1;< BUZZ   23
 BUZZ     3.450    0.150 854.948   1000.0    F2   0.000   0.000   0.000   0.000   0.000
        23.000
;PRINT P1;< BUZZ   24
 BUZZ     3.600    0.500 880.000   1000.0    F3   0.000   0.000   0.000   0.000   0.000
        24.000
;PRINT P1;< BUZZ   25
 FINISH; < NN   .SCR